home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Delphi Magazine Collection 2001
/
Delphi Magazine Collection 20001 (2001).iso
/
DISKS
/
ISSUE09
/
FILES
/
NAMES2U.DFM
/
NAMES2U.txt
Wrap
Text File
|
1996-02-18
|
32KB
|
682 lines
object DataForm: TDataForm
Left = 210
Top = 114
BorderIcons = [biSystemMenu, biMinimize]
BorderStyle = bsSingle
Caption = 'DataForm'
ClientHeight = 119
ClientWidth = 330
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
Menu = MainMenu1
PixelsPerInch = 96
Position = poDefaultPosOnly
ShowHint = True
OnCreate = FormCreate
OnDestroy = FormDestroy
TextHeight = 13
object TLabel
Left = 8
Top = 40
Width = 28
Height = 13
Caption = '&Name'
FocusControl = NameEdt
end
object TLabel
Left = 264
Top = 40
Width = 58
Height = 13
Caption = '&Date of birth'
FocusControl = DOBEdt
end
object SpeedBar: TPanel
Left = 0
Top = 0
Width = 330
Height = 33
Align = alTop
TabOrder = 0
object UndoBtn: TSpeedButton
Tag = 1
Left = 168
Top = 4
Width = 25
Height = 25
Hint = 'Undo|'
Enabled = False
Glyph.Data = {
56070000424D5607000000000000360400002800000028000000140000000100
0800000000002003000000000000000000000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000C0DCC000F0CA
A600000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
000000000000000000000000000000000000F0FBFF00A4A0A000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00030303030303
0303030303030303030303030303030303030303030303030303030303030303
0303030303030303030303030303030303030303030303030303030303030303
0303030303030303030303030303030303030303030303030303030303030303
030303030303030303030303030303030303FF030303FF030303030303030303
0303030303030303030303030303030303030303030303030303FF0303FFFFFF
0303FF0303030303030303030303030303030303030303030303030303030303
0303FFFFFFFFFFFFFFFFFFFF03030303030303030303030303030303030303FF
FFFFFF03030303030303FFFFFFFFFFFFFFFFF801010103030303030303030303
030303030303F8F8F8F8FFFF030303030303FFFFFFFFFFFFFFF8F9FDFD050103
03030303030303030303030303F8FF0303F8F8FFFF0303030303FFFFFFFFFFFF
FFF9FDF9FDFD050103030303030303030303030303F8FF030303F8F8FFFF0303
0303FFFFFFFFFFFF03FDF9FFF9FDFD0500030303030303030303030303F8FF03
030303F8F8FFFF030303FFFF03FFFFFF03F9FDFFFDF9FD000600030303030303
0303030303F803FF030303F8F8F8FFFF0303FF030303FF030303F9FDFFFD0002
0406000303030303030303030303F803FF03F8F8F8F8F8FFFF03FF0303030303
030303F9FD00FA02020406000303030303030303030303F803F803F8F8F8F8F8
FFFF0303030303030303030300FAFBFA020200F8000303030303030303030303
F803FF03F8F8F8F8F8FF030303030303030303030300FAFBFA0004F8F8000303
030303030303030303F803FF03F8F8F8F8F803030303030303030303030300FA
0007FB04F8F8030303030303030303030303F803F80303F8F8F8030303030303
030303030303030007FFFBFB04F803030303030303030303030303F803FF0303
F8F8030303030303030303030303030300FFFFFBFB0403030303030303030303
03030303F803FF0303F803030303030303030303030303030300FFFFFBFB0303
03030303030303030303030303F803FF03030303030303030303030303030303
030300FFFFFB03030303030303030303030303030303F8030303}
NumGlyphs = 2
OnClick = EditItemClick
end
object CutBtn: TSpeedButton
Tag = 2
Left = 192
Top = 4
Width = 25
Height = 25
Hint = 'Cut|'
Enabled = False
Glyph.Data = {
56070000424D5607000000000000360400002800000028000000140000000100
0800000000002003000000000000000000000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000C0DCC000F0CA
A600000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
000000000000000000000000000000000000F0FBFF00A4A0A000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00030303030303
0303030303030303030303030303030303030303030303030303030303030303
0303030303030303030303030303030303030303030303030303FFFFFFFF0303
03030303FFFFFFFF0303030303F80404F8030303030303F80404F80303030303
03F8F8F8F8FFFF03030303F8F8F8F8FFFF030303F804030304F803030303F804
030304F803030303F8F8FF03F8F8FF030303F8F80303F8F8FF030303F8040303
0304030303030403030304F803030303F8F8FF0303F8FF030303F8FF0303F8F8
FF030303F80403030304030303030403030304F803030303F8F8FFFF03F8FFFF
0303F8FF0303F8F80303030303F804030304F80303F804030304F80303030303
03F8F8FFFFF8F8FFFFF8F8FFFFF8F803030303030303F804040404F8F8040404
04F80303030303030303F8F8F8F8F8F8F8F8F8F8F8F803030303030303030303
0404040404040404030303030303030303030303F8F8F8F8F8F8F8F803030303
0303030303030303030406FFFF06040303030303030303030303030303F8F803
FFF8F8FF0303030303030303030303030300FF0000FF00030303030303030303
0303030303F803F8F803F803FF030303030303030303030300FFFFFFFF00FF00
030303030303030303030303F8030303FFF803F803FF03030303030303030300
FFFFFF0000FFFFFF0003030303030303030303F8030303F8F803FF03F803FF03
03030303030300FFFFFF00030300FFFFFF000303030303030303F8030303F803
03F803FF03F803FF030303030300FFFFFF000303030300FFFFFF000303030303
03F8030303F803030303F803FF03F803FF03030300FFFFFF0003030303030300
FFFFFF0003030303F8FF0303F8030303030303F803FF03F8FF03030300FFFF00
030303030303030300FFFF0003030303F8FF03F80303030303030303F803FFF8
FF03030300FF000303030303030303030300FF0003030303F8FFF80303030303
0303030303F803F8FF0303030000030303030303030303030303000003030303
F8F8030303030303030303030303F8F803030303030303030303030303030303
0303030303030303030303030303030303030303030303030303}
NumGlyphs = 2
OnClick = EditItemClick
end
object CopyBtn: TSpeedButton
Tag = 3
Left = 216
Top = 4
Width = 25
Height = 25
Hint = 'Copy|'
Enabled = False
Glyph.Data = {
56070000424D5607000000000000360400002800000028000000140000000100
0800000000002003000000000000000000000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000C0DCC000F0CA
A600000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
000000000000000000000000000000000000F0FBFF00A4A0A000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00030303030303
03030303030303030303030303030303030303030303FFFFFFFFFFFFFFFFFFFF
0303030303030303030000000000000000000003030303030303030303F8F8F8
F8F8F8F8F8F8F8FF03030303030303030300FFFFFFFFFFFFFFFF000303030303
0303030303F8FF03030303030303F8FF03030303030303030300FBFFFBFFFBFF
FBFF0003030303030303030303F8FF03FFFFFFFFFFFFF8FF0303030303030303
0300FFF8F8F8F8F8F8FF0003030303030303030303F8FFF8F8F8F8F8F803F8FF
03030303030303030300FBFFFBFFFBFFFBFF00030303030303FFFFFFFFF8FF03
FFFFFFFFFFFFF8FF03030303000000000000FFF8F8F8F8F8F8FF000303030303
F8F8F8F8F8F8FFF8F8F8F8F8F803F8FF0303030300FFFFFFFF00FBFFFBFFFBFF
FBFF000303030303F8FF030303F8FF03FFFFFFFFFFFFF8FF0303030300FFFFFF
FF00FFF8F8F8F8F8F8FF000303030303F8FF030303F8FFF8F8F8F8F8F803F8FF
0303030300FF07070700FBFFFBFFFBFFFBFF000303030303F8FF030303F8FF03
0303030303FFF8FF0303030300FFFFFFFF00FFFFFFFFFFFF0000000303030303
F8FF030303F8FF0303030303F8F8F8030303030300FF07070700FBFFFBFFFBFF
0000030303030303F8FF030303F8FFFFFFFFFFFFF8F803030303030300FFFFFF
FF000000000000000003030303030303F8FF030303F8F8F8F8F8F8F8F8030303
0303030300FF070707070707FF0003030303030303030303F8FF030303030303
03F8FF03030303030303030300FFFFFFFFFFFFFFFF0003030303030303030303
F8FF030303030303FFF8FF03030303030303030300FFFFFFFFFFFF0000000303
0303030303030303F8FF0303030303F8F8F80303030303030303030300FFFFFF
FFFFFF00000303030303030303030303F8FFFFFFFFFFFFF8F803030303030303
030303030000000000000000030303030303030303030303F8F8F8F8F8F8F8F8
0303030303030303030303030303030303030303030303030303030303030303
0303030303030303030303030303030303030303030303030303030303030303
0303030303030303030303030303030303030303030303030303}
NumGlyphs = 2
OnClick = EditItemClick
end
object PasteBtn: TSpeedButton
Tag = 4
Left = 240
Top = 4
Width = 25
Height = 25
Hint = 'Paste|'
Enabled = False
Glyph.Data = {
56070000424D5607000000000000360400002800000028000000140000000100
0800000000002003000000000000000000000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000C0DCC000F0CA
A600000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
000000000000000000000000000000000000F0FBFF00A4A0A000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00030303030303
03030303030303030303030303030303030303030303030303FFFFFFFFFFFFFF
FFFF030303030303030303030000000000000000000303030303030303030303
F8F8F8F8F8F8F8F8F8FF0303030303030303030300FBFFFBFFFBFFFB00030303
03FFFFFFFFFFFFFFF8FF03FFFFFFFFFFF8FF0303000000000000000000FFF8F8
F8F8F8FF00030303F8F8F8F8F8F8F8F8F8FFF8F8F8F8F803F8FF030007FF07FF
07FF07FF00FBFFFBFFFBFFFB000303F8FF03030303030303F8FF030303FFFFFF
F8FF0300FF07FF07FF07FF0700FF0707F8F8F8FF000303F8FF03030303030303
F8FFFFFFF8F8F803F8FF030007FF07FF07FF0704040404FBFFFBFFFB000303F8
FF030303030303F8F8F8F8FF03FFFFFFF8FF0300FF07FF07FF07FF07FC040407
F8F8F8FF000303F8FF03030303030303F8F8F8FFF8F8F803F8FF030007FF07FF
07FF070404FC04FBFFFBFFFB000303F8FF030303030303F8F8F8F8FF030303FF
F8FF0300FF07FF07FF07040404FF04FFFFFFF8F8000303F8FF0303030303F8F8
F8FFF8030303F8F8F803030007FF07FF0704040400FBFFFBFFFBF800030303F8
FF03030303F8F8F8F8FFFFFFFFFFF8F803030300FF07FF070404040700000000
00000003030303F8FF030303F8F8F803F8F8F8F8F8F8F8030303030007FF07FF
070407FF07FF000303030303030303F8FF03030303F803030303F8FF03030303
03030300FF07FF07FF07FF07FF07000303030303030303F8FF03030303030303
0303F8FF030303030303030007FF07FF07FF07FF07FF000303030303030303F8
FF0303FFFFFFFFFFFF03F8FF0303030303030300FF07040404040404FF070003
03030303030303F803FFF8F8F8F8F8F8FFFFF80303030303030303030000FEFC
FCFCFC04000003030303030303030303F8F803F8F8F8F8F8F8F8030303030303
030303030303FEFCFCFCFC04030303030303030303030303030303F8F8F8F8F8
030303030303030303030303030303FEFEFEFE03030303030303030303030303
0303030303030303030303030303030303030303030303030303030303030303
0303030303030303030303030303030303030303030303030303}
NumGlyphs = 2
OnClick = EditItemClick
end
object FirstBtn: TSpeedButton
Left = 64
Top = 4
Width = 25
Height = 25
Hint = 'First record|'
Enabled = False
Glyph.Data = {
78010000424D7801000000000000760000002800000020000000100000000100
04000000000000000000120B0000120B00000000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
33333333333333333333333333333333333333333333333333FF333333333333
3000333333FFFFF3F77733333000003000B033333777773777F733330BFBFB00
E00033337FFF3377F7773333000FBFB0E000333377733337F7773330FBFBFBF0
E00033F7FFFF3337F7773000000FBFB0E000377777733337F7770BFBFBFBFBF0
E00073FFFFFFFF37F777300000000FB0E000377777777337F7773333330BFB00
000033333373FF77777733333330003333333333333777333333333333333333
3333333333333333333333333333333333333333333333333333333333333333
33333333333333333333333333333333333333333333333333330000}
NumGlyphs = 2
OnClick = FirstClick
end
object PriorBtn: TSpeedButton
Left = 88
Top = 4
Width = 25
Height = 25
Hint = 'Previous record|'
Enabled = False
Glyph.Data = {
78010000424D7801000000000000760000002800000020000000100000000100
04000000000000000000120B0000120B00000000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
3333333333333333333333333333333333333333333333333333333333333333
3333333333333FF3333333333333003333333333333F77F33333333333009033
333333333F7737F333333333009990333333333F773337FFFFFF330099999000
00003F773333377777770099999999999990773FF33333FFFFF7330099999000
000033773FF33777777733330099903333333333773FF7F33333333333009033
33333333337737F3333333333333003333333333333377333333333333333333
3333333333333333333333333333333333333333333333333333333333333333
33333333333333333333333333333333333333333333333333330000}
NumGlyphs = 2
OnClick = PriorClick
end
object NextBtn: TSpeedButton
Left = 112
Top = 4
Width = 25
Height = 25
Hint = 'Next record|'
Enabled = False
Glyph.Data = {
78010000424D7801000000000000760000002800000020000000100000000100
04000000000000000000120B0000120B00000000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
3333333333333333333333333333333333333333333333333333333333333333
3333333333333333333333333333333333333333333FF3333333333333003333
3333333333773FF3333333333309003333333333337F773FF333333333099900
33333FFFFF7F33773FF30000000999990033777777733333773F099999999999
99007FFFFFFF33333F7700000009999900337777777F333F7733333333099900
33333333337F3F77333333333309003333333333337F77333333333333003333
3333333333773333333333333333333333333333333333333333333333333333
33333333333333333333333333333333333333333333333333330000}
NumGlyphs = 2
OnClick = NextClick
end
object LastBtn: TSpeedButton
Left = 136
Top = 4
Width = 25
Height = 25
Hint = 'Last record|'
Enabled = False
Glyph.Data = {
78010000424D7801000000000000760000002800000020000000100000000100
04000000000000000000120B0000120B00000000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
3333333333333333333333333333333333333FFF333333333333000333333333
3333777FFF3FFFFF33330B000300000333337F777F777773F333000E00BFBFB0
3333777F773333F7F333000E0BFBF0003333777F7F3337773F33000E0FBFBFBF
0333777F7F3333FF7FFF000E0BFBF0000003777F7F3337777773000E0FBFBFBF
BFB0777F7F33FFFFFFF7000E0BF000000003777F7FF777777773000000BFB033
33337777773FF733333333333300033333333333337773333333333333333333
3333333333333333333333333333333333333333333333333333333333333333
33333333333333333333333333333333333333333333333333330000}
NumGlyphs = 2
OnClick = LastClick
end
object SpeedButton1: TSpeedButton
Left = 296
Top = 4
Width = 25
Height = 25
Hint = 'Exit application|'
Glyph.Data = {
10020000424D1002000000000000760000002800000030000000100000000100
0400000000008001000000000000000000000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00330000000000
03333388888888888F3333000000000003333301111111110333338F33333333
8F333301BBBBBBBB03333301111111110333338F333333338F3333011BBBBBBB
03333301111111110333338F333333338F33330111BBBBBB0333330111111111
0333338F333333338F333301110BBBBB03333301111111110333338F33333333
8F333301110BBBBB03333301111111110333338F3333333F8F333301110BBBBB
03333301111111B10333338F333333838F333301110BBBBB0333330111111111
0333338F333333338F333301110BBBBB03333301111111110333338F33FFFFF3
8F333301110BBBBB033333011EEEEE110333338F388888F38F33330111B0BBBB
033333011EEEEE110333338F38FFF8F38F333301110BBBBB033333011EEEEE11
0333338F388888338F333301110BBBBB03333301111111110333338F33333333
8F333301E10BBBBB03333301111111110333338FFFFFFFFF8F333301EE0BBBBB
0333330000000000033333888888888883333300000000000333000000000000
0000000000000000000000000000000000000000}
NumGlyphs = 3
OnClick = ExitClick
end
object NewBtn: TSpeedButton
Left = 8
Top = 4
Width = 25
Height = 25
Hint = 'New record|'
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000130B0000130B00000000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0033333333B333
333B33FF33337F3333F73BB3777BB7777BB3377FFFF77FFFF77333B000000000
0B3333777777777777333330FFFFFFFF07333337F33333337F333330FFFFFFFF
07333337F33333337F333330FFFFFFFF07333337F33333337F333330FFFFFFFF
07333FF7F33333337FFFBBB0FFFFFFFF0BB37777F3333333777F3BB0FFFFFFFF
0BBB3777F3333FFF77773330FFFF000003333337F333777773333330FFFF0FF0
33333337F3337F37F3333330FFFF0F0B33333337F3337F77FF333330FFFF003B
B3333337FFFF77377FF333B000000333BB33337777777F3377FF3BB3333BB333
3BB33773333773333773B333333B3333333B7333333733333337}
NumGlyphs = 2
OnClick = NewClick
end
object ChangeBtn: TSpeedButton
Left = 32
Top = 4
Width = 25
Height = 25
Hint = 'Change record|'
AllowAllUp = True
GroupIndex = 1
Enabled = False
Glyph.Data = {
78010000424D7801000000000000760000002800000020000000100000000100
04000000000000000000120B0000120B00000000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333000000
000033333377777777773333330FFFFFFFF03FF3FF7FF33F3FF700300000FF0F
00F077F777773F737737E00BFBFB0FFFFFF07773333F7F3333F7E0BFBF000FFF
F0F077F3337773F3F737E0FBFBFBF0F00FF077F3333FF7F77F37E0BFBF00000B
0FF077F3337777737337E0FBFBFBFBF0FFF077F33FFFFFF73337E0BF0000000F
FFF077FF777777733FF7000BFB00B0FF00F07773FF77373377373330000B0FFF
FFF03337777373333FF7333330B0FFFF00003333373733FF777733330B0FF00F
0FF03333737F37737F373330B00FFFFF0F033337F77F33337F733309030FFFFF
00333377737FFFFF7733333033000000033333373377777773330000}
NumGlyphs = 2
OnClick = ChangeClick
end
object DeleteBtn: TSpeedButton
Tag = 5
Left = 264
Top = 4
Width = 25
Height = 25
Hint = 'Delete|'
Enabled = False
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000130B0000130B00000000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
333333333333333333FF33333333333330003333333333333777333333333333
300033FFFFFF3333377739999993333333333777777F3333333F399999933333
3300377777733333337733333333333333003333333333333377333333333333
3333333333333333333F333333333333330033333F33333333773333C3333333
330033337F3333333377333CC3333333333333F77FFFFFFF3FF33CCCCCCCCCC3
993337777777777F77F33CCCCCCCCCC399333777777777737733333CC3333333
333333377F33333333FF3333C333333330003333733333333777333333333333
3000333333333333377733333333333333333333333333333333}
NumGlyphs = 2
OnClick = EditItemClick
end
end
object NameEdt: TEdit
Left = 9
Top = 59
Width = 248
Height = 20
Enabled = False
MaxLength = 30
TabOrder = 1
OnChange = EditBoxChange
OnExit = EditBoxExit
OnKeyUp = EditBoxKeyUp
OnMouseDown = EditBoxMouseDown
OnMouseMove = EditBoxMouseMove
end
object TPanel
Left = 0
Top = 94
Width = 330
Height = 25
Align = alBottom
TabOrder = 2
object StatusLine: TPanel
Left = 2
Top = 2
Width = 160
Height = 21
Alignment = taLeftJustify
BevelOuter = bvLowered
TabOrder = 0
end
object RecordNum: TPanel
Left = 163
Top = 2
Width = 165
Height = 21
BevelOuter = bvLowered
TabOrder = 1
end
end
object DOBEdt: TMaskEdit
Left = 264
Top = 58
Width = 57
Height = 20
Enabled = False
EditMask = '!90/90/00;1;_'
MaxLength = 8
TabOrder = 3
Text = ' / / '
OnChange = EditBoxChange
OnExit = EditBoxExit
OnKeyUp = EditBoxKeyUp
OnMouseDown = EditBoxMouseDown
OnMouseMove = EditBoxMouseMove
end
object MainMenu1: TMainMenu
Left = 154
Top = 46
object FileMnu: TMenuItem
Caption = '&File'
Hint = '|File related items'
object NewMnu: TMenuItem
Caption = '&New'
Enabled = False
OnClick = NewClick
end
object IgnoreMe3: TMenuItem
Caption = '-'
end
object FirstMnu: TMenuItem
Caption = '&First'
Enabled = False
Hint = '|First record'
OnClick = FirstClick
ShortCutText = 'Ctrl+F'
end
object PriorMnu: TMenuItem
Caption = '&Prior'
Enabled = False
Hint = '|Prior record'
OnClick = PriorClick
ShortCutText = 'Ctrl+P'
end
object NextMnu: TMenuItem
Caption = '&Next'
Enabled = False
Hint = '|Next record'
OnClick = NextClick
ShortCutText = 'Ctrl+N'
end
object LastMnu: TMenuItem
Caption = '&Last'
Enabled = False
Hint = '|Last record'
OnClick = LastClick
ShortCutText = 'Ctrl+L'
end
object IgnoreMe1: TMenuItem
Caption = '-'
end
object ExitBtn: TMenuItem
Caption = 'E&xit'
Hint = '|Exit application'
OnClick = ExitClick
ShortCutText = 'Alt+X'
end
end
object EditMnu: TMenuItem
Caption = '&Edit'
Hint = '|Clipboard operations'
object ChangeMnu: TMenuItem
Caption = '&Change'
Enabled = False
OnClick = ChangeClick
end
object IgnoreMe4: TMenuItem
Caption = '-'
end
object UndoMnu: TMenuItem
Tag = 1
Caption = '&Undo'
Enabled = False
Hint = '|Undo'
OnClick = EditItemClick
ShortCutText = 'Ctrl+Z'
end
object IgnoreMe2: TMenuItem
Caption = '-'
end
object CutMnu: TMenuItem
Tag = 2
Caption = 'Cu&t'
Enabled = False
Hint = '|Cut to clipboard'
OnClick = EditItemClick
ShortCutText = 'Ctrl+X'
end
object CopyMnu: TMenuItem
Tag = 3
Caption = '&Copy'
Enabled = False
Hint = '|Copy to clipboard'
OnClick = EditItemClick
ShortCutText = 'Ctrl+C'
end
object PasteMnu: TMenuItem
Tag = 4
Caption = '&Paste'
Enabled = False
Hint = '|Paste from clipboard'
OnClick = EditItemClick
ShortCutText = 'Ctrl+V'
end
object DeleteMnu: TMenuItem
Tag = 5
Caption = '&Delete'
Enabled = False
Hint = '|Delete selection'
OnClick = EditItemClick
ShortCutText = 'Del'
end
end
end
end